home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Diamond Collection / The Diamond Collection (Software Vault)(Digital Impact).ISO / cdr28 / par300.zip / EXAMPL04.STX < prev    next >
Text File  |  1995-04-05  |  2KB  |  25 lines
  1. ;C
  2. ┌─────────────────────────────────────────────────────────────────────────────┐
  3. │ ░ ░ ░ ░ ░ ░ ░ ░ ░ ░ ░ ░ ░ ░    EXAMPLE # 4    ░ ░ ░ ░ ░ ░ ░ ░ ░ ░ ░ ░ ░ ░ ░ │
  4. └─────────────────────────────────────────────────────────────────────────────┘
  5. ┌─────────────────────────────────────────────────────────────────────────────┐
  6. │                                                                             │
  7. │                                                                             │
  8. │ THE INPUT FILE:  List of invoices for a computer store                      │
  9. │                                                                             │
  10. │                                                                             │
  11. │ WHAT WE WANT:    (1) Copy only items for the IBM-PC and the Macintosh       │
  12. │                  (2) Move the columns around and add some extra spaces      │
  13. │                  (3) Change the way a negative amount is represented        │
  14. │                      (i.e. change 345.00- to -345.00)                       │
  15. │                                                                             │
  16. │                                                                             │
  17. │ HOW WE DO IT:    (1) We use clustered ACCEPTs to make this selection        │
  18. │                  (2) We use SET and PAD for this step                       │
  19. │                  (3) We use IF to detect the sign, then INSERT if necessary │
  20. │                                                                             │
  21. │                                                                             │
  22. └─────────────────────────────────────────────────────────────────────────────┘
  23.  
  24. ;P
  25.